temporary fix subr doc field to zero

diff --git a/src/comp.c b/src/comp.c
index f92bc62506bab84923c20e92c9592e1ba188566b..04cee63dfbd841d4f3321328edea97d043ca5248 100644 (file)
--- a/src/comp.c
+++ b/src/comp.c
@@ -3285,6 +3285,7 @@ DEFUN ("comp--register-subr", Fcomp__register_subr,
   x->s.max_args = FIXNUMP (maxarg) ? XFIXNUM (maxarg) : MANY;
   x->s.symbol_name = SSDATA (Fsymbol_name (name));
   x->s.intspec = NULL;
+  x->s.doc = 0; /* FIXME */
   x->s.native_elisp = true;
   defsubr (x);